home *** CD-ROM | disk | FTP | other *** search
Text File | 1991-07-07 | 11.9 KB | 369 lines | [TEXT/EDIT] |
- ; this is: pfOptional.txt 7/4/91 1:08:00AM
-
- ; alert color tables
-
- .ALIGN 2
- RESOURCE 'actb' 257 'About'
- DC.L $00000000,$00000004 ; Color table for About dialog
- DC.L $0000B9B3,$F3B4FFFF
- DC.L $00019999,$33333333
- DC.L $00020000,$00000000
- DC.L $00030000,$00000000
- DC.L $0004FFFF,$FFFFFFFF
-
- .ALIGN 2
- RESOURCE 'actb' 258 'Red Alert'
- DC.L $00000000,$00000004 ; color table for red alert
- DC.L $0000AAAA,$00000000
- DC.L $00010000,$00000000
- DC.L $00020000,$00000000
- DC.L $00030000,$00000000
- DC.L $0004FFFF,$FFFFFFFF
-
- ; help resources
-
- .ALIGN 2
- RESOURCE 'hfdr' 59840 ; unsigned -5696
- DC.W 2 ; version
- DC.L 0,0 ; options+ID
- DC.W 1 ; number
-
- DC.W 20,3 ; HMStringResItem
- DC.W 1,16 ; STR# 1, item 18
- DC.W 1,16
- DC.W 1,16
- DC.W 1,16
-
- .ALIGN 2
- RESOURCE 'hmnu' 1 'Apple'
- DC.W 2 ; version
- DC.L 0,0 ; options
- DC.W 2 ; number of items+1
-
- DC.W 4,256 ; HMSkipItem for missing & null
-
- DC.W 4,256 ; HMSkipItem for title
-
- DC.W 20,3 ; HMStringResItem
- DC.W 1,1 ; STR# 1, item 1
- DC.W 0,0 ; dimmed menu item
- DC.W 0,0 ;
- DC.W 0,0 ;
-
- .ALIGN 2
- RESOURCE 'hmnu' 2 'File'
- DC.W 2 ; version
- DC.L 0,0 ; options
- DC.W 9 ; number of items+1
-
- DC.W 4,256 ; HMSkipItem for missing & null
-
- DC.W 20,3 ; HMStringResItem
- DC.W 1,2 ; STR# 1, item 2
- DC.W 0,0 ; dimmed menu title
- DC.W 0,0 ;
- DC.W 0,0 ;
-
- DC.W 20,3 ; HMStringResItem
- DC.W 1,3 ; STR# 1, item 3
- DC.W 0,0 ; dimmed menu item
- DC.W 0,0 ;
- DC.W 0,0 ;
-
- DC.W 4,256 ; HMSkipItem for seperator
-
- DC.W 20,3 ; HMStringResItem
- DC.W 1,4 ; STR# 1, item 4
- DC.W 0,0 ; dimmed menu item
- DC.W 0,0 ;
- DC.W 0,0 ;
-
- DC.W 20,3 ; HMStringResItem
- DC.W 1,5 ; STR# 1, item 5
- DC.W 0,0 ; dimmed menu item
- DC.W 0,0 ;
- DC.W 0,0 ;
-
- DC.W 4,256 ; HMSkipItem for seperator
-
- DC.W 20,3 ; HMStringResItem
- DC.W 1,6 ; STR# 1, item 6
- DC.W 0,0 ; dimmed menu item
- DC.W 0,0 ;
- DC.W 0,0 ;
-
- DC.W 4,256 ; HMSkipItem for seperator
-
- DC.W 20,3 ; HMStringResItem
- DC.W 1,7 ; STR# 1, item 7
- DC.W 0,0 ; dimmed menu item
- DC.W 0,0 ;
- DC.W 0,0 ;
-
- .ALIGN 2
- RESOURCE 'hmnu' 3 'Edit'
- DC.W 2 ; version
- DC.L 0,0 ; options
- DC.W 7 ; number of items+1
-
- DC.W 4,256 ; HMSkipItem for missing & null
-
- DC.W 20,3 ; HMStringResItem
- DC.W 1,8 ; STR# 1, item 8
- DC.W 0,0 ; dimmed menu title
- DC.W 0,0 ;
- DC.W 0,0 ;
-
- DC.W 20,3 ; HMStringResItem
- DC.W 1,9 ; STR# 1, item 9
- DC.W 0,0 ; dimmed menu item
- DC.W 0,0 ;
- DC.W 0,0 ;
-
- DC.W 4,256 ; HMSkipItem for seperator
-
- DC.W 20,3 ; HMStringResItem
- DC.W 1,10 ; STR# 1, item 10
- DC.W 0,0 ; dimmed menu item
- DC.W 0,0 ;
- DC.W 0,0 ;
-
- DC.W 20,3 ; HMStringResItem
- DC.W 1,11 ; STR# 1, item 11
- DC.W 0,0 ; dimmed menu item
- DC.W 0,0 ;
- DC.W 0,0 ;
-
- DC.W 20,3 ; HMStringResItem
- DC.W 1,12 ; STR# 1, item 12
- DC.W 0,0 ; dimmed menu item
- DC.W 0,0 ;
- DC.W 0,0 ;
-
- DC.W 20,3 ; HMStringResItem
- DC.W 1,13 ; STR# 1, item 13
- DC.W 0,0 ; dimmed menu item
- DC.W 0,0 ;
- DC.W 0,0 ;
-
- .ALIGN 2
- RESOURCE 'hrct' 128
- DC.W 2 ; version
- DC.L 0,0 ; options+ID
- DC.W 1 ; number of rectangles
-
- DC.W 20,3 ; HMStringResItem
- DC.W 35,55 ;
- DC.W 0,0,1024,1024 ; hot rect
- DC.W 1,14 ; STR# 1, item 14
-
- .ALIGN 2
- RESOURCE 'hwin' 128
- DC.W 2 ; version
- DC.L 0 ; options
- DC.W 2 ; number of rectangles
-
- DC.W 128 ; ID of hrct
- DC.L 'hrct'
- DC.W 12 ; length of string to compare
- DC.B 12,'Pocket Forth' ; window name
-
- .ALIGN 2
- RESOURCE 'hdlg' 257
- DC.W 2 ; version
- DC.W 0 ; start with item 0
- DC.L 0,0 ; options+ID+variation
- DC.W 1 ; number of items
-
- DC.W 4,256 ; HMSkipItem for missing & null
-
- DC.W 20,3 ; HMStringResItem
- DC.W 50,190 ; tip location
- DC.W 0,0,0,0 ; default alternate rect
- DC.W 1,15 ; string for enabled
- DC.W 0,0 ; never dimmed
- DC.W 0,0 ; or checked
- DC.W 0,0 ; or marked either
-
- .ALIGN 2
- RESOURCE 'STR#' 1
- DC.W 16 ; number of strings
-
- ; item 1
- DC.B 67,'Introduces the author and gives information '
- DC.B 'about the application. '
-
- ; item 2
- DC.B 122,'File menu',13,13,'Items in this menu select, '
- DC.B 'save, and print Pocket Forth programs. You can '
- DC.B 'also debug and quit the application.'
-
- ; item 3
- DC.B 213,'Displays a dialog box that allows you to select '
- DC.B 'a text document.',13,13,'If the document contains a '
- DC.B 'Pocket Forth program, it will be interpreted. If '
- DC.B 'the document is not a program, an interpreter error '
- DC.B 'will be displayed.'
-
- ; item 4
- DC.B 171,' CAUTION:',13,'Use only on a copy of '
- DC.B 'Pocket Forth!',13,13,'All changes you have made to '
- DC.B 'the Pocket Forth application will be made permanent.'
- DC.B ' Opened documents are not effected.'
-
- ; item 5
- DC.B 254,' DANGER!',13,'Do not release the '
- DC.B 'button!',13,13,'Unless you have installed a '
- DC.B 'debugging application you will get a bomb box! '
- DC.B 'You can then use the "Resume" (or "Continue") '
- DC.B 'button to quit.',13,13,'A debugger, such as TMON, '
- DC.B 'Macsbug, etc., is entered if installed.'
-
- ; item 6
- DC.B 101,'Beep the speaker.',13,13,'The Print command is '
- DC.B 'here as a required Apple Event. Nothing is '
- DC.B 'actually printed.'
-
- ; item 7
- DC.B 137,'Quit the Pocket Forth application without '
- DC.B 'fanfare. Unless you have Saved prior to Quitting, '
- DC.B 'all additions and changes will be disgarded.'
-
- ; item 8
- DC.B 133,'Edit menu',13,13,'Most of these items are for use '
- DC.B 'with desk accessories on older systems.',13,13
- DC.B 'Also, you can paste a program into Pocket Forth. '
-
- ; item 9
- DC.B 39,'Nothing can be Undone, this just beeps.'
-
- ; item 10
- DC.B 42,'You cannot Cut anything. This just beeps.'
-
- ; item 11
- DC.B 70,'Since there is nothing to Copy, this just beeps.'
- DC.B 13,13,'Is this getting old?'
-
- ; item 12
- DC.B 162,'Interprets a Pocket Forth program from the '
- DC.B 'clipboard as if you had typed it in. If the '
- DC.B 'clipboard contains text that is not a program, an '
- DC.B 'error will be indicated.'
-
- ; item 13
- DC.B 43,'There is nothing to Clear, this just beeps.'
-
- ; item 14
- DC.B 142,'Console Window.',13,13,'Type or paste Pocket '
- DC.B 'Forth ‘words’ into this window. The text is interpreted '
- DC.B 'after each line and any output is printed here.'
-
- ; item 15
- DC.B 179,'Pocket Forth is FREE!',13
- DC.B 13,'Contact me at any of the following addresses:'
- DC.B 13,' CompuServe [70566,1474]'
- DC.B 13,' Bitnet heilman@pc',13,' US Mail 85066-8345'
- DC.B 13,13,'Click this window to close this dialog.'
-
- ; item 16
- DC.B 189,'Pocket Forth',13,13
- DC.B 'Pocket Forth is a programming language for any '
- DC.B 'Macintosh. Use this application to create other '
- DC.B 'applications.',13,13,'Double click on this icon '
- DC.B 'to enter the Pocket Forth environment.'
-
- ; color & small icons
-
- .ALIGN 2
- RESOURCE 'ics#' 128
- DC.L $000F00FD,$017E0F7E,$71278117,$80A180F6
- DC.L $808C8087,$80808088,$D51CBD1C,$C27E1BF8
- DC.L $000F00FD,$017E0F7E,$7F3FFF1F,$FFBFFFFF
- DC.L $FF8FFF87,$FF80FF88,$FF1CFF1C,$C27E1BF8
-
- .ALIGN 2
- RESOURCE 'icl4' 128
- DC.L $00000000,$00000000,$00000000,$00055550,$00000000,$00000000,$00000000,$05555055
- DC.L $00000000,$00000000,$00000000,$55550055,$00000000,$00000000,$00555505,$55550000
- DC.L $00000000,$00000000,$55555555,$55555000,$00000000,$00000000,$50055555,$55555000
- DC.L $00000000,$00000000,$00005555,$55555500,$00000000,$FFFFFFFF,$00055101,$05555500
- DC.L $0000FFFF,$0000000F,$000550FF,$F0555550,$0FFF0000,$0CCCCCDF,$00050F00,$DD015550
- DC.L $F0000CCC,$CCCCCCDF,$000000EE,$00D01555,$F0CCCCCC,$CCCCCCCD,$F0000FFE,$00310105
- DC.L $F0CCCCCC,$CCCCCCCD,$F000F01F,$F3101015,$F0CCCCCC,$CCCCCCCD,$F00F0101,$F1212121
- DC.L $F0CCCCCC,$CCCCCCCD,$F00FFFF0,$12121212,$F0CCCCCC,$CCCCCCCD,$F000000F,$212FF121
- DC.L $F0CCCCCC,$CCCCCCCD,$F0000000,$FFF21212,$F0CCCCCC,$CCCCCCCD,$F0000000,$0F21212F
- DC.L $F0CCCCCC,$CCCCCCCD,$F0000000,$00FFFFF0,$F0CCCCCC,$CCCCCCCC,$DF000000,$00000000
- DC.L $F0CCCCCC,$CCCCCCCC,$DF000000,$00000000,$F0CCCCCC,$CCCCCCCC,$DF000000,$00000000
- DC.L $F0CCCCCC,$CCCCCCCD,$DF000000,$00000000,$F0DDDDDD,$DDDDDDDD,$FF000000,$FD000000
- DC.L $F0DDDDDD,$DDDDDDDF,$0000000F,$EED00000,$F0DDDDDD,$DDDDDDDF,$0000000F,$CCE00000
- DC.L $FFFDFFFF,$FFFFFFDF,$0000000D,$CCE00000,$00FFF000,$000000FF,$000000FD,$EEEE0000
- DC.L $F0000000,$00000000,$000FDDDE,$E13FEF00,$000F0000,$00000000,$00FDDEDE,$EEAEF000
- DC.L $000000F0,$00000000,$00EEEEEE,$EF000000,$00000000,$0F00F00F,$0FFFFFFF,$00000000
-
- .ALIGN 2
- RESOURCE 'ics4' 128
- DC.L $00000000,$00005555,$00000000,$55555505
- DC.L $00000005,$05555550,$0000FFFF,$055FF550
- DC.L $0FFF000F,$00F00F55,$F000CCDF,$000F0F55
- DC.L $F0CCCCCD,$F0F01215,$F0CCCCCD,$FFFF2FF1
- DC.L $F0CCCCCD,$F000FF12,$F0CCCCCD,$F0000FFF
- DC.L $F0CCCCCD,$F0000000,$F0CCCCCD,$F000D000
- DC.L $F0CDCDDF,$000DCD00,$F2DCDCDF,$000DCD00
- DC.L $FF0000F0,$0CDE3EF0,$000EE0EE,$EEEEE000
-
- .ALIGN 2
- RESOURCE 'icl8' 128
- DC.L $00000000,$00000000,$00000000,$00000000,$00000000,$00000000,$000000AB,$ABABAB00
- DC.L $00000000,$00000000,$00000000,$00000000,$00000000,$00000000,$00ABABAB,$AB00ABAB
- DC.L $00000000,$00000000,$00000000,$00000000,$00000000,$00000000,$ABABABAB,$0000ABAB
- DC.L $00000000,$00000000,$00000000,$00000000,$0000ABAB,$ABAB00AB,$ABABABAB,$00000000
- DC.L $00000000,$00000000,$00000000,$00000000,$ABABABAB,$ABABABAB,$ABABABAB,$AB000000
- DC.L $00000000,$00000000,$00000000,$00000000,$AB0000AB,$ABABABAB,$ABABABAB,$AB000000
- DC.L $00000000,$00000000,$00000000,$00000000,$00000000,$ABABABAB,$ABABABAB,$ABAB0000
- DC.L $00000000,$00000000,$FFFFFFFF,$FFFFFFFF,$000000AB,$AB010101,$01ABABAB,$ABAB0000
- DC.L $00000000,$FFFFFFFF,$01010101,$010101FF,$000000AB,$AB01FFFF,$FF01ABAB,$ABABAB00
- DC.L $00FFFFFF,$01010101,$01080808,$080833FF,$000000AB,$00FF0000,$33330101,$ABABAB00
- DC.L $FF010101,$01080808,$08080808,$080833FF,$00000000,$0000A5A5,$00003301,$01ABABAB
- DC.L $FF010808,$08080808,$08080808,$08080833,$FF000000,$00FFFFA5,$0000D801,$010101AB
- DC.L $FF010808,$08080808,$08080808,$08080833,$FF000000,$FF0101FF,$FFD80101,$010101AB
- DC.L $FF010808,$08080808,$08080808,$08080833,$FF0000FF,$01010101,$FF010808,$08080101
- DC.L $FF010808,$08080808,$08080808,$08080833,$FF0000FF,$FFFFFF01,$01080808,$08080808
- DC.L $FF010808,$08080808,$08080808,$08080833,$FF000000,$000000FF,$080808FF,$FF080808
- DC.L $FF010808,$08080808,$08080808,$08080833,$FF000000,$00000000,$FFFFFF08,$08080808
- DC.L $FF010808,$08080808,$08080808,$08080833,$FF000000,$00000000,$00FF0808,$080808FF
- DC.L $FF010808,$08080808,$08080808,$08080833,$FF000000,$00000000,$0000FFFF,$FFFFFF00
- DC.L $FF010808,$08080808,$08080808,$08080808,$33FF0000,$00000000,$00000000,$00000000
- DC.L $FF010808,$08080808,$08080808,$08080808,$33FF0000,$00000000,$00000000,$00000000
- DC.L $FF010808,$08080808,$08080808,$08080808,$33FF0000,$00000000,$00000000,$00000000
- DC.L $FF010808,$08080808,$08080808,$08080833,$33FF0000,$00000000,$00000000,$00000000
- DC.L $FF01F9F9,$F9F9F9F9,$F9F9F9F9,$F9F93333,$FFFF0000,$00000000,$FBF90000,$00000000
- DC.L $FF01F9F9,$F9F9F9F9,$F9F9F9F9,$F9F933FF,$00000000,$000000FB,$FBFBF900,$00000000
- DC.L $FF013333,$33333333,$33333333,$333333FF,$00000000,$000000FB,$F6F6FB00,$00000000
- DC.L $FFFFFF33,$FFFFFFFF,$FFFFFFFF,$FFFF33FF,$00000000,$000000F9,$F6F6FB00,$00000000
- DC.L $0000FFFF,$FF000000,$00000000,$0000FFFF,$00000000,$0000FFF9,$FBFBFBFB,$00000000
- DC.L $FF000000,$00000000,$00000000,$00000000,$000000FF,$F9F9F9FB,$FB05D8FF,$FBFF0000
- DC.L $000000FF,$00000000,$00000000,$00000000,$0000FFF9,$FAFBFAFB,$FBFBFDFB,$FF000000
- DC.L $00000000,$0000FF00,$00000000,$00000000,$0000FBFB,$FBFBFBFB,$FBFF0000,$00000000
- DC.L $00000000,$00000000,$00FF0000,$FF0000FF,$00FFFFFF,$FFFFFFFF,$00000000,$00000000
-
- .ALIGN 2
- RESOURCE 'ics8' 128
- DC.L $00000000,$00000000,$00000000,$B0B0B0B0
- DC.L $00000000,$00000000,$B0B0B0B0,$B0B000B0
- DC.L $00000000,$000000EC,$00B0B0B0,$B0B0B000
- DC.L $00000000,$FFFFFFFF,$00B0B0FF,$FFB0B000
- DC.L $00FFFFFF,$010101FF,$0000FF00,$00FFB0B0
- DC.L $FF010101,$010833FF,$000000FF,$00FFB0B0
- DC.L $FF010808,$08080833,$FF00FF01,$010808B0
- DC.L $FF010808,$08080833,$FFFFFFFF,$08FFFF08
- DC.L $FF010808,$08080833,$FF000000,$FFFF0808
- DC.L $FF010808,$08080833,$FF000000,$00FFFFFF
- DC.L $FF010808,$08080833,$FF000000,$00000000
- DC.L $FF010808,$08080833,$FF000000,$FB000000
- DC.L $FF01FAFA,$FAFA33FF,$000000FB,$2BFB0000
- DC.L $FF013333,$333333FF,$000000FB,$2BFB0000
- DC.L $FFFF0000,$0000FF00,$00FBF9FB,$D8FBFF00
- DC.L $000000FB,$FB00FBFB,$FBFBFBFB,$FB000000
-
- END
-